#pragma once
#include <iostream>
#include <string.h>

#include <sys/wait.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <arpa/inet.h>
#include <netinet/in.h>

#include "log.hpp"
#include "ThreadPool.hpp"
#include "Task.hpp"

enum
{
    Usage_ERR = 1,
    SOCK_ERR,
    BIND_ERR,
    LISTEN_ERR
};

std::string defaultip = "0.0.0.0";
const int backlog = 10;

class TcpServer;

class ThreadDate
{
public:
    ThreadDate(int sockfd,std::string clientip,uint16_t clientport,TcpServer* t)
        :_sockfd(sockfd),_clientip(clientip),_clientport(clientport),_tsvr(t)
    {}
public:
    int _sockfd;
    std::string _clientip;
    uint16_t _clientport;
    TcpServer* _tsvr;
};

class TcpServer
{
public:
    TcpServer(const uint16_t& port,const std::string& ip = defaultip)
        :_listensockfd(0),_port(port),_ip(ip)
    {}

    void Init()
    {
        _listensockfd = socket(AF_INET,SOCK_STREAM,0);
        if(_listensockfd < 0)
        {
            lg(FATAL,"_listensockfd create false,_listensockfd:%d",_listensockfd);
            exit(SOCK_ERR);
        }
        lg(INFO,"_listensockfd create success,_listensockfd:%d",_listensockfd);

        // bind绑定需要struct sockaddr结构体
        struct sockaddr_in local;
        local.sin_family = AF_INET;
        local.sin_port = htons(_port);
        inet_aton(_ip.c_str(),&local.sin_addr);

        // 进行绑定
        int n = bind(_listensockfd,(struct sockaddr*)&local,sizeof(local));
        if(n < 0)
        {
            lg(FATAL,"bind false,errno:%d,errstring:%s",errno,strerror(errno));
            exit(BIND_ERR);
        }
        lg(INFO,"bind success,errno:%d,errstring:%s",errno,strerror(errno));
        
        //TCP是面向连接的，服务器一般是比较“被动”的，服务器一直处于一种，一直等待连接到来的状态
        int m = listen(_listensockfd,backlog);
        if(m < 0)
        {
            lg(FATAL,"listen false,error:%d,errstring:%s",errno,strerror(errno));
            exit(LISTEN_ERR);
        }
        lg(INFO,"listen success,error:%d,errstring:%s",errno,strerror(errno));
    }

    static void* Routine(void* args)
    {
        pthread_detach(pthread_self());
        ThreadDate* td = static_cast<ThreadDate*>(args);
        td->_tsvr->Service(td->_sockfd,td->_clientip,td->_clientport);
        delete td;
        return nullptr;
    }

    void Start()
    {
        ThreadPool<Task>::GetInstance()->Start(); // 启动线程池
        lg(INFO,"tcpserver is running ...");
        for(;;)
        {
            struct sockaddr_in client;
            socklen_t len = sizeof(client);

            // 获取新链接 accept收到客户端上的数据的时候要把网络序列转主机序列
            int sockfd = accept(_listensockfd,(struct sockaddr*)&client,&len);
            if(sockfd < 0)
            {
                lg(WARNING,"accept error,errno:%d,errstring:%s",errno,strerror(errno));
                continue;
            }
            // lg(INFO,"accept success,errno:%d,errstring:%s",errno,strerror(errno));
            // 拿到客户端的端口和IP
            uint16_t clientport = ntohs(client.sin_port);
            char clientip[32];
            inet_ntop(AF_INET,&client,clientip,sizeof(clientip));
            lg(INFO,"get a new link,_sockfd:%d,clientport:%d,clientip:%s",sockfd,clientport,clientip);
            // 根据新链接进行通信

            // // // version1 -- 单进程版本
            // Service(sockfd,clientip,clientport); // 服务端做处理
            // close(sockfd);

            // version2 -- 多进程版本
            // fork线程，在子进程中关闭listen文件描述符，创建孙子进程，让孙子进程去进行Service，
            // 父进程进行等待，但是创建一个进程的成本太高了，所以这个版本也不建议使用
            // pid_t id = fork();
            // if(id == 0)
            // {
            //     // 子进程
            //     close(_listensockfd);
            //     if (fork() > 0) break;
            //     Service(sockfd,clientip,clientport);
            //     close(sockfd);
            //     exit(0);
            // }
            // close(sockfd);
            // waitpid(id,nullptr,0);

            // version3 -- 多线程版本
            // 创建好一个ThreadDate类，其中成员变量为sockfd，客户端的端口号和IP
            // 创建线程这里需要将上述类传入(pthread_create)
            // 在routine里面进行线程分离，强转，调用server，删除，返回
            // 最后有一个类内static问题
            // ThreadDate* td = new ThreadDate(sockfd,clientip,clientport,this);
            // pthread_t tid;
            // pthread_create(&tid,nullptr,Routine,td);

            // version4 -- 线程池版本
            // 任务
            // 线程池Getinstance->push，记得在最开始的时候Start
            Task task(sockfd,clientip,clientport);
            ThreadPool<Task>::GetInstance()->Push(task);
        }
    }

    void Service(int& sockfd,const std::string& clientip,const uint16_t& clientport)
    {
        char buffer[1024];
        while(true)
        {
            memset(buffer, 0, sizeof(buffer));
            // 首先从sockfd中读数据
            int n = read(sockfd,buffer,sizeof(buffer));
            // 如果读到了数据就直接进行处理
            if(n > 0)
            {
                // 进行处理数据
                std::cout<<"client say#"<<buffer<<std::endl;
                std::string echostr = "server#";
                echostr += buffer;
                // 再将处理后的数据写入sockfd中让客户端读取
                write(sockfd,echostr.c_str(),echostr.size());
            }
            else if (n == 0)
            {
                lg(INFO, "%s:%d quit, server close sockfd: %d", clientip.c_str(), clientport, sockfd);
                break;
            }
            else
            {
                lg(WARNING, "read error, sockfd: %d, client ip: %s, client port: %d", sockfd, clientip.c_str(), clientport);
                break;
            }

        }
    }

    ~TcpServer()
    {
        if(_listensockfd > 0) close(_listensockfd);
    }

private:
    int _listensockfd;
    uint16_t _port;
    std::string _ip;
};